/*
 *  linux/kernel/console.c
 *
 *  (C) 1991  Linus Torvalds
 */

/*
 *	console.c
 *
 * This module implements the console io functions
 *	'void con_init(void)'
 *	'void con_write(struct tty_queue * queue)'
 * Hopefully this will be a rather complete VT102 implementation.
 *
 * Beeping thanks to John T Kohl.
 */

/*
 *  NOTE!!! We sometimes disable and enable interrupts for a short while
 * (to put a word in video IO), but this will work even for keyboard
 * interrupts. We know interrupts aren't enabled when getting a keyboard
 * interrupt, as we use trap-gates. Hopefully all is well.
 */

/*
 * Code to check for different video-cards mostly by Galen Hunt,
 * <g-hunt@ee.utah.edu>
 */

#include <linux/sched.h>
#include <linux/tty.h>
#include <asm/io.h>
#include <asm/system.h>

/*
 * These are set up by the setup-routine at boot-time:
 */

#define ORIG_X			(*(unsigned char *)0x90000)  	    // 初始光标列号。
#define ORIG_Y			(*(unsigned char *)0x90001)         // 初始光标行号。
#define ORIG_VIDEO_PAGE		(*(unsigned short *)0x90004)    // 显示页面。
#define ORIG_VIDEO_MODE		((*(unsigned short *)0x90006) & 0xff)             // 显示模式。
#define ORIG_VIDEO_COLS 	(((*(unsigned short *)0x90006) & 0xff00) >> 8)    // 字符列数。
#define ORIG_VIDEO_LINES	(25)                           // 显示行数
#define ORIG_VIDEO_EGA_AX	(*(unsigned short *)0x90008)   
#define ORIG_VIDEO_EGA_BX	(*(unsigned short *)0x9000a)   // 显示内存大小和色彩模式。
#define ORIG_VIDEO_EGA_CX	(*(unsigned short *)0x9000c)   // 显示卡特性参数。

// 定义显示器单色/彩色显示模式类型符号常数。
#define VIDEO_TYPE_MDA		0x10	/* Monochrome Text Display	单色文本 */
#define VIDEO_TYPE_CGA		0x11	/* CGA Display 	CGA显示器		*/
#define VIDEO_TYPE_EGAM		0x20	/* EGA/VGA in Monochrome Mode	EGA/VGA单色 */
#define VIDEO_TYPE_EGAC		0x21	/* EGA/VGA in Color Mode	EGA/VGA彩色 */

#define NPAR 16  // 转义字符序列中最大参数个数。

extern void keyboard_interrupt(void);
// 参考：图10-8 向上卷屏(scroll up) 操作示意图 中的各变量含义
static unsigned char	video_type;		    /* Type of display being used	使用的显示类型，即显卡类型 */
static unsigned long	video_num_columns;	/* Number of text columns	屏幕文本列数(屏幕显示页最大列数) */
static unsigned long	video_size_row;		/* Bytes per row		    屏幕每行使用的显存字节数 */
static unsigned long	video_num_lines;	/* Number of text lines		屏幕文本行数(屏幕显示页最大行数) */
static unsigned char	video_page;		    /* Initial video page		初始显示页面 */
static unsigned long	video_mem_start;	/* Start of video RAM		    显示内存起始地址 */
static unsigned long	video_mem_end;		/* End of video RAM (sort of)	显示内存结束(末端）地址 */
static unsigned short	video_port_reg;		/* Video register select port	显示控制索引寄存器端口（0x3d4） */
static unsigned short	video_port_val;		/* Video register value port	显示控制数据寄存器端口（0x3d5） */
static unsigned short	video_erase_char;	/* Char+Attrib to erase with	擦除字符属性及字符 （0x0720）*/

// 以下这些变量用于屏幕卷屏操作。(origin 表示移动的虚拟窗口左上角原点内存地址）。
static unsigned long	origin;		/* Used for EGA/VGA fast scroll	滚屏起始内存地址（屏幕窗口显存起始位置） */
static unsigned long	scr_end;	/* Used for EGA/VGA fast scroll	滚屏末端内存地址（屏幕窗口显存结束位置） */
static unsigned long	pos;			/* 当前光标对应的显示内存位置（线性地址）。 */
static unsigned long	x,y;            /* 当前光标对应的屏幕窗口位置x、y坐标。 */
static unsigned long	top,bottom;     /* top：屏幕内容块顶行行号；bottom：屏幕内容块底行行号bottom。 */
// state 用于标明处理 ESC 转义序列时的当前步骤。par[]用于存放 ESC 序列的中间处理参数。
static unsigned long	state=0;		/* ANSI 转义字符序列处理状态。*/
static unsigned long	npar,par[NPAR]; /* ANSI 转义字符序列参数个数和参数数组。 */
static unsigned long	ques=0;         /* 收到问号字符标志。*/
static unsigned char	attr=0x07;      /* 字符属性（黑底白字)。*/

static void sysbeep(void);   /* 系统蜂鸣函数。*/

/*
 * this is what the terminal answers to a ESC-Z or csi0c
 * query (= vt100 response).
 */
#define RESPONSE "\033[?1;2c"

/* NOTE! gotoxy thinks x==video_num_columns is ok */
// 更新当前光标位置变量X,y，并修正光标在显示内存中的对应位置 pos。
static inline void gotoxy(unsigned int new_x,unsigned int new_y)
{
	if (new_x > video_num_columns || new_y >= video_num_lines)
		return;
	x=new_x;
	y=new_y;
	pos=origin + y*video_size_row + (x<<1); // 屏幕显示中的1列在显存中用2个字节表示，所以x<<1
}

// 设置滚屏时屏幕窗口的起始显示内存地址。
static inline void set_origin(void)
{
	/*
	参考：图10-8 向上卷屏(scroll up) 操作示意图
	首先向显示寄存器选择端口 video_port_reg 输出12，即选择显示控制数据寄存器r12，
	然后写入卷屏起始地址高字节。向右移动9位，表示向右移动8位再除以2（屏幕上1个字符在显存中用 2 字节表示）。
	再选择显示控制数据寄存器r13，然后写入卷屏起始地址低字节。向右移动1位表示除以2，同样代表屏幕上1个字符用 2字节表示。
	输出值是相对于默认显示内存起始位置 video_mem_start 操作的，例如对于彩色模式，video_mem_start = 物理内存地址0xb8000。
	*/
	cli();
	outb_p(12, video_port_reg); // 选择显示控制数据寄存器r12
	outb_p(0xff&((origin-video_mem_start)>>9), video_port_val);  // 写入起始地址高字节
	outb_p(13, video_port_reg);
	outb_p(0xff&((origin-video_mem_start)>>1), video_port_val);  // 写入起始地址低字节
	sti();
}

// （top-bottom之间的显示内容）向上卷动一行。
static void scrup(void)
{
	if (video_type == VIDEO_TYPE_EGAC || video_type == VIDEO_TYPE_EGAM)
	{
		/*
		如果移动起始行 top=0，移动最底行 bottom = video_num_lines = 25，则表示整屏窗口在显存上向下移动。
		于是把整个屏幕窗口左上角对应的起始内存位置 origin 调整为向下移一行对应的内存位置，
		同时也跟踪调整当前光标对应的内存位置pos以及屏幕末行末端字符指针 scr_end 的位置。
		最后把新屏幕滚动窗口内存起始位置值 origin 写入显示控制器中。
		*/
		if (!top && bottom == video_num_lines) {
			origin += video_size_row;
			pos += video_size_row;
			scr_end += video_size_row;
			// 复制显存数据上卷
			// 1、屏幕窗口末端所对应的显示内存指针 scr_end 超出了实际显示内存末端
			if (scr_end > video_mem_end) {
				/*
				如果屏幕窗口末端所对应的显示内存指针 scr_end 超出了实际显示内存末端，
				则将屏幕内容除第一行以外所有行对应的内存数据移动到显示内存的起始位置 video_mem_start 处，
				并在整屏窗口向下移动出现的新行上填入空格字符。
				然后根据屏幕内存数据移动后的情况，重新调整当前屏幕对应内存的起始指针、光标位置指针和屏幕末端对应内存指针 scr_end。

				这段嵌入汇编程序首先将（屏幕字符行数- 1）行对应的内存数据移动到显示内存起始位置 video_mem_start 处，
				然后在随后的内存位置处添加一行空格（擦除）字符数据。
					%O -eax(擦除字符+属性）；
					%1 -ecx（（屏幕字符行数-1）所对应的字符数/2，以长字移动）；
					%2 -edi(显示内存起始位置 video mem start)；
					%3 -esi(屏幕窗口内存起始位置 origin)。
					移动方向：[edi]＞[esi]，移动 ecx个长字。
				*/
				__asm__("cld\n\t"
					"rep\n\t"
					"movsl\n\t"
					"movl video_num_columns,%1\n\t"
					"rep\n\t"
					"stosw"
					::"a" (video_erase_char),
					"c" ((video_num_lines-1)*video_num_columns>>1),
					"D" (video_mem_start),
					"S" (origin)
					);
				scr_end -= origin-video_mem_start;
				pos -= origin-video_mem_start;
				origin = video_mem_start;
			} else {
			/*
			如果调整后的屏幕末端对应的内存指针 scr_end 没有超出显示内存的未端 video_mem_end, 
			则只需在新行上填入擦除字符（空格字符)。
			%0 - eax(擦除字符+属性)；%1 - ecx(屏幕字符列数）；%2 - edi(最后1行开始处对应内存位置）；
			*/
				__asm__("cld\n\t"
					"rep\n\t"
					"stosw"
					::"a" (video_erase_char),
					"c" (video_num_columns),
					"D" (scr_end-video_size_row)
					);
			}
			set_origin();
		} else {
		/*
		否则表示不是整屏移动。即表示从指定行 top 开始到 bottom 区域中的所有行向上移动1行， 指定行 top 被删除。
		此时直接将屏幕从指定行 top 到屏幕末端所有行对应的显示内存数据向上移动1行，并在最下面新出现的行上填入擦除字符。
			%0 - eax(擦除字符+属性)；
			%1 - ecx(top 行下1 行开始到 bottom 行所对应的内存长字数）；
			%2 - edi(top 行所处的内存位置)；
			%3 - esi(top+1 行所处的内存位置）。
		*/
			__asm__("cld\n\t"
				"rep\n\t"
				"movsl\n\t"
				"movl video_num_columns,%%ecx\n\t"
				"rep\n\t"
				"stosw"
				::"a" (video_erase_char),
				"c" ((bottom-top-1)*video_num_columns>>1),
				"D" (origin+video_size_row*top),
				"S" (origin+video_size_row*(top+1))
				);
		}
	}
	else		/* Not EGA/VGA */
	{
		__asm__("cld\n\t"
			"rep\n\t"
			"movsl\n\t"
			"movl video_num_columns,%%ecx\n\t"
			"rep\n\t"
			"stosw"
			::"a" (video_erase_char),
			"c" ((bottom-top-1)*video_num_columns>>1),
			"D" (origin+video_size_row*top),
			"S" (origin+video_size_row*(top+1))
			);
	}
}

// （top-bottom之间的显示内容）向下卷动一行。
static void scrdown(void)
{
	if (video_type == VIDEO_TYPE_EGAC || video_type == VIDEO_TYPE_EGAM)
	{
		/*
		1、rep movsl： 从倒数第2行(bottom-1)开始一直到top，将每行的内容复制到下一行
		2、rep stosw： 将top行填充擦除字符
		*/
		__asm__("std\n\t"  /* 方向置位，逆序拷贝 */
			"rep\n\t"
			"movsl\n\t"
			"addl $2,%%edi\n\t"	/* %edi has been decremented by 4 （edi因反向拷贝字符的原因，已经-4，此处再+2，相当于一个word的长度）*/
			"movl video_num_columns,%%ecx\n\t" /* 将擦除字符填入上方新行中(top行) */
			"rep\n\t"
			"stosw"
			::"a" (video_erase_char),
			"c" ((bottom-top-1)*video_num_columns>>1), /* top 行到 bottom-1 行的行数所对应的内存长字数 */
			"D" (origin+video_size_row*bottom-4),      /* 窗口右下角最后一个长字位置 */
			"S" (origin+video_size_row*(bottom-1)-4)   /* 窗口倒数第2行最后一个长字位置 */
			);
	}
	else		/* Not EGA/VGA */
	{
		__asm__("std\n\t"
			"rep\n\t"
			"movsl\n\t"
			"addl $2,%%edi\n\t"	/* %edi has been decremented by 4 */
			"movl video_num_columns,%%ecx\n\t"
			"rep\n\t"
			"stosw"
			::"a" (video_erase_char),
			"c" ((bottom-top-1)*video_num_columns>>1),
			"D" (origin+video_size_row*bottom-4),
			"S" (origin+video_size_row*(bottom-1)-4)
			);
	}
}

// 光标位置下移一行 (lf - line feed 换行)。
// 如果光标没有处在最后一行上，则直接修改光标当前行变量 y++，并调整光标对应显示内存位置 pos(加上一行字符所对应的内存长度）。否则就需要将屏幕窗口内容上移一行。
// 函数名称 lf (line feed 换行）是指处理控制字符LF。
static void lf(void)
{
	if (y+1<bottom) {
		y++;
		pos += video_size_row;
		return;
	}
	scrup();
}

// 光标在同列上移一行(ri - reverse line feed 反向换行)
static void ri(void)
{
	if (y>top) {
		y--;
		pos -= video_size_row;
		return;
	}
	scrdown();
}

// 光标回到第1列（0列）(cr - carriage return 回车）
static void cr(void)
{
	pos -= x<<1;
	x=0;
}

// 擦除光标前一字符（用空格替代） (del 一 delete 删除）
static void del(void)
{
	if (x) {
		pos -= 2;
		x--;
		*(unsigned short *)pos = video_erase_char;  // 写入2个字节
	}
}

// 删除屏幕上与光标位置相关的部分（用空格替代，在擦除字符或行时光标位置不变）。(CSI 一 Control Sequence Introducer, 即控制序列引导码）
// ANSI 控制序列：“ESC[ Ps J”（Ps= 0 -删除光标处到屏幕底端；1 -删除屏幕开始到光标处；2-整屏删除）。
// 参数：par -对应上面控制序列中Ps 的值。
static void csi_J(int par)
{
	long count;
	long start;

	switch (par) {
		// 删除光标处到屏幕底端
		case 0:	/* erase from cursor to end of display */
			count = (scr_end-pos)>>1;
			start = pos;
			break;
		// 删除屏幕开始到光标处
		case 1:	/* erase from start to cursor */
			count = (pos-origin)>>1;
			start = origin;
			break;
		// 整屏删除
		case 2: /* erase whole display */
			count = video_num_columns * video_num_lines;
			start = origin;
			break;
		default:
			return;
	}
	__asm__("cld\n\t"
		"rep\n\t"
		"stosw\n\t"
		::"c" (count),
		"D" (start),"a" (video_erase_char)
		);
}

// 删除一行上与光标位置相关的部分（用空格替代，在擦除字符或行时光标位置不变）
// ANSI 转义字符序列：’ESC [ Ps K’(Ps =0 删除到行尾；1从开始删除；2 整行都删除）。
static void csi_K(int par)
{
	long count;
	long start;

	switch (par) {
		case 0:	/* erase from cursor to end of line */
			if (x>=video_num_columns)
				return;
			count = video_num_columns-x;
			start = pos;
			break;
		case 1:	/* erase from start of line to cursor */
			start = pos - (x<<1);
			count = (x<video_num_columns)?x:video_num_columns;
			break;
		case 2: /* erase whole line */
			start = pos - (x<<1);
			count = video_num_columns;
			break;
		default:
			return;
	}
	__asm__("cld\n\t"
		"rep\n\t"
		"stosw\n\t"
		::"c" (count),
		"D" (start),"a" (video_erase_char)
		);
}

// 设置显示字符属性。
// ANSI 转义序列："ESC [ Ps m"。Ps 取值： 0默认属性；1加粗；4 加下划线：7反显；27正显。
// 该控制序列根据参数设置字符显示属性。以后所有发送到终端的字符都将使用这里指定的属性，直到再次执行本控制序列重新设置字符显示的属性。
// 对于单色和彩色显示卡，设置的属性是有区别的，这里仅作了简化处理。
void csi_m(void)
{
	int i;

	// 如果设置多个属性，例如 echo -e '\033[4;7m'，最后一个属性生效，即7生效。
	for (i=0;i<=npar;i++)
		switch (par[i]) {
			case 0:attr=0x07;break;
			case 1:attr=0x0f;break;
			case 4:attr=0x0f;break;
			case 7:attr=0x70;break;
			case 27:attr=0x07;break;
		}
}

// 设置显示光标（更新光标显示位置）。
// 根据光标对应显示内存位置 pos，设置显示控制器光标的显示位置。
// 该函数会在con_write()函数中，每次处理完字符显示后会被调用。
static inline void set_cursor(void)
{
	cli();
	outb_p(14, video_port_reg);  // 选择显示控制数据寄存器r14（光标寄存器高8位）
	outb_p(0xff&((pos-video_mem_start)>>9), video_port_val);  // 写入pos地址高字节
	outb_p(15, video_port_reg);
	outb_p(0xff&((pos-video_mem_start)>>1), video_port_val);  // 写入pos地址低字节
	sti();
}

// 发送对 VT100 的响应序列。
// 即为响应主机请求终端向主机发送设备属性（DA）。
// 主机通过发送不带参数或参数是0的 DA 控制序列（’ESC [ O c’ 或’ESC Z’）来要求终端发送一个设备属性（DA）控制序列，
// 终端则发送85行上定义的应答序列（RESPONSE，即’ESC [?1;2c’）来响应主机的序列，该序列告诉主机本终端是具有高级视频功能的VT100 兼容终端。
// 处理过程是将应答序列放入读缓冲队列中，并使用 copy_to_cooked(） 函数处理后放入辅助队列中。
static void respond(struct tty_struct * tty)
{
	char * p = RESPONSE;

	cli();
	// 将应答序列放入读队列。逐字符放入
	while (*p) {
		PUTCH(*p,tty->read_q);
		p++;
	}
	sti();
	copy_to_cooked(tty);
}

// 在光标处插入1个空格字符
// 把光标开始处的所有字符右移一格，并将擦除字符插入在光标所在处。
static void insert_char(void)
{
	int i=x;
	unsigned short tmp, old = video_erase_char;
	unsigned short * p = (unsigned short *) pos;

	while (i++<video_num_columns) {
		tmp=*p;
		*p=old;
		old=tmp;
		p++;
	}
}

// 在光标处插入1行。
// 将屏幕窗口从光标所在行到窗口底的内容向下卷动一行。光标将处在新的空行上。
static void insert_line(void)
{
	int oldtop,oldbottom;

	oldtop=top;
	oldbottom=bottom;
	top=y;
	bottom = video_num_lines;
	scrdown();
	top=oldtop;
	bottom=oldbottom;
}

// 删除一个字符
// 删除光标处的一个字符，光标右边的所有字符左移一格
static void delete_char(void)
{
	int i;
	unsigned short * p = (unsigned short *) pos;

	if (x>=video_num_columns)
		return;
	i = x;
	while (++i < video_num_columns) {
		*p = *(p+1);
		p++;
	}
	*p = video_erase_char;  // 最后填入擦除字符
}

// 删除光标所在行。
// 删除光标所在的一行，并从光标所在行开始屏幕内容上卷一行
static void delete_line(void)
{
	int oldtop,oldbottom;

	oldtop=top;
	oldbottom=bottom;
	top=y;
	bottom = video_num_lines;
	scrup();
	top=oldtop;
	bottom=oldbottom;
}

// 在光标处插入nr个字符。
// ANSI 转义字符序列：’ESC [ Pn @’。在当前光标处插入1个或多个空格字符。Pn 是插入的字符数。默认是1。
// 光标将仍然处于第1个插入的空格字符处。在光标与右边界的字符将右移。超过右边界的字符将被丢失。
// 参数 nr =转义字符序列中的参数n。
static void csi_at(unsigned int nr)
{
	if (nr > video_num_columns)
		nr = video_num_columns;
	else if (!nr)
		nr = 1;
	while (nr--)
		insert_char();
}

// 在光标位置处插入nr 行。
// ANSI 转义字符序列：’ESC[ Pn L’。该控制序列在光标处插入1行或多行空行。操作完成后光标位置不变。
// 当空行被插入时，光标以下滚动区域内的行向下移动。滚动出显示页的行就丢失。
// 参数 nr =转义字符序列中的参数 Pn。
static void csi_L(unsigned int nr)
{
	if (nr > video_num_lines)
		nr = video_num_lines;
	else if (!nr)
		nr = 1;
	while (nr--)
		insert_line();
}

// 删除光标处的 nr 个字符。
// ANSI 转义序列：’ESC [ Pn P’。该控制序列从光标处删除 Pn 个字符。
// 当一个字符被删除时， 光标右所有字符都左移。这会在右边界处产生一个空字符。
// 其属性应该与最后一个左移字符相同，但这里作了简化处理，仅使用字符的默认属性（黑底白字空格 0x0720）来设置空字符。
// 参数 nr = 转义字符序列中的参数 Pn。
static void csi_P(unsigned int nr)
{
	if (nr > video_num_columns)
		nr = video_num_columns;
	else if (!nr)
		nr = 1;
	while (nr--)
		delete_char();
}

// 删除光标处的nr行。
// ANSI 转义序列：‘ESC [ Pn M’。该控制序列在滚动区域内，从光标所在行开始删除1行或多行。
// 当行被删除时，滚动区域内的被删行以下的行会向上移动，并且会在最底行添加1空行。
// 若 Pn 大于显示页上剩余行数，则本序列仅删除这些剩余行，并对滚动区域外不起作用。
// 参数 nr=转义字符序列中的参数 Pn。
static void csi_M(unsigned int nr)
{
	if (nr > video_num_lines)
		nr = video_num_lines;
	else if (!nr)
		nr=1;
	while (nr--)
		delete_line();
}

static int saved_x=0;
static int saved_y=0;

// 保存当前光标位置。
static void save_cur(void)
{
	saved_x=x;
	saved_y=y;
}

// 恢复保存的光标位置
static void restore_cur(void)
{
	gotoxy(saved_x, saved_y);
}

// 控制台写函数
// 从终端对应的tty写缓冲队列write_q中循环每次取一个字符，针对每个字符进行分析后显示在屏幕上。
// 		1、若是控制字符或转义序列或控制序列，则进行光标定位、字符删除等的控制处理；
// 		2、对于普通字符就直接在光标处显示。
// 参数 tty 是当前控制台使用的 tty 结构指针。
void con_write(struct tty_struct * tty)
{
	int nr;  // 写缓冲队列中现有字符数nr
	char c;

	nr = CHARS(tty->write_q);  // 缓冲区字符个数
	while (nr--) {
		GETCH(tty->write_q,c);  // 获取一个字符，赋值到c中
		/*
		处理转义字符序列
		
		转义字符序列的格式为：引导码ESC 中间字符(控制功能) 结尾字符(命令)  
		控制序列是其中一种转义字符序列，格式为：“ESC [ 参数字符 结尾字符”   参考：图10-9 控制序列例子

		终端可使用两类参数字符：数字字符和选择字符。
			数字字符参数代表一个十进制数，用 Pn 表示。范围是0--9。
			选择字符参数来自于一个指定的参数表，用 Ps 表示。
			如果一个控制序列中包含不止一个参数，则用分号;(0x3b）来隔开。
		
		state = 0: 初始状态，或者原先是状态 4；或者原先是状态 1，但字符不是“[”；
				1：原是状态0，并且字符是转义字符 ESC (0x1b = 033= 27）。处理后恢复状态0。
				2：原是状态1，并且字符是“[”；
				3：原是状态2，或者原是状态3，并且字符是“;”或数字。
				4：原是状态3，并且字符不是“;”或数字；处理后恢复状态0。
		*/
		switch(state) {
			// 处理控制字符和普通显示字符
			case 0:
				// 如果从写队列中取出的字符是普通显示字符代码，就直接从当前映射字符集中取出对应的显示字符，并放到当前光标所处的显示内存位置处，即直接显示该字符。然后把光标位置右移一个字符位置
				if (c>31 && c<127) {  // 32~126是 ASCII打印字符（0~31是控制字符）
					// 如果光标处在行末端或末端以外，则将光标移到下行头列
					if (x>=video_num_columns) {
						x -= video_num_columns;  // y 不变，因为还是当前行
						pos -= video_size_row;   // 这一步是因为lf()会对pos进行增加，所以先提前进行减操作。这样就可以保持pos不变
						lf();
					}
					// 将字符c写入到显示内存的pos处
					__asm__("movb attr,%%ah\n\t"
						"movw %%ax,%1\n\t"
						::"a" (c),"m" (*(short *)pos)
						);
					// 光标自增
					pos += 2;
					x++;
				} else if (c==27) // ESC 转义控制字符
					state=1;
				else if (c==10 || c==11 || c==12)  // LF（换行）、VT（垂直制表符）、FF（换页）
					lf();
				else if (c==13)  // CR（回车）
					cr();
				else if (c==ERASE_CHAR(tty))
					del();
				else if (c==8) {  // BS(退格)
					if (x) {
						x--;
						pos -= 2;
					}
				} else if (c==9) {  // HT（水平制表符Tab）
					// 将光标移到 8 的倍数列上
					c=8-(x&7);  // x&7 等同于取余操作 x%8
					x += c;
					pos += c<<1;
					if (x>video_num_columns) {
						x -= video_num_columns;
						pos -= video_size_row;
						lf();
					}
					c=9;
				} else if (c==7)  // BEL（震铃）
					sysbeep();
				break;
			// 如果在原状态0收到转义字符 ESC(Ox1b = 033= 27)，则转到状态1处理。
			// 该状态对 转义字符 进行处理。处理完后默认的状态将是0。
			case 1:
				state=0;
				if (c=='[')           	// ESC [ - 是CSI序列。
					state=2;
				else if (c=='E') 		// ESC E - 光标下移1行回0列
					gotoxy(0,y+1);
				else if (c=='M')		// ESC M - 光标上移1行同列
					ri();
				else if (c=='D')		// ESC D - 光标下移1行同列
					lf();
				else if (c=='Z')        // ESC Z - 设备属性查询
					respond(tty);
				else if (c=='7')        // ESC 7 - 保存光标位置．
					save_cur();
				else if (c=='8')        // ESC 8 - 恢复保存的光标原位置
					restore_cur();
				break;
			/*
			通用标准控制序列格式：		“ESC[ P1;P2 结束字符”
			私有（专有）控制序列格式：	“ESC[ ?P1;P2 结束字符”  当参数字符以任一"＜=＞?"(0x30--0x3f）字符开头时，终端将把本控制序列作为专有（私有）控制序列。

			状态2用于CSI控制序列中参数数组清零。是状态3的准备工作
			首先对 ESC 转义字符序列保存参数的数组 par[] 清零，索引变量 npar 指向首项，并且设置状态为3。
			若此时字符不是“?”，则直接转到状态3去处理;
			若此时字符是“?”，说明这个序列是终端设备私有序列，后面会有一个功能字符。于是去读下一字符， 再到状态3处理代码处执行
			*/
			case 2: // ESC [ （CSI控制序列引导码 (Control Sequence Introducer））
				for(npar=0;npar<NPAR;npar++)
					par[npar]=0;
				npar=0;
				state=3;
				if ((ques=(c=='?'))) // 这里break如果未被执行，则透传到下一个case语句
					break;
			/*
			状态3用于处理CSI序列中参数部分，格式：ESC [ P1;P2
			把转义字符序列中的 数字字符 转换成 数值 保存在 par[]数组中。
			
			如果原是状态 2， 或者原来就是状态 3，但原字符是’;’或数字，则在状态3 处理。
			此时，如果字符c是分号 ，并且数组 par 未满，则索引值加1，准备处理下一个字符。
			*/
			case 3:  // 示例：ESC [ 12;23m
				if (c==';' && npar<NPAR-1) { 
					npar++;
					break;
				} else if (c>='0' && c<='9') {
					par[npar]=10*par[npar]+c-'0'; // 数字字符 转换成 十进制数值。（c-'0' 表示数字字符c的ASCII码转换为对应的数字）
					break;
				} else state=4;   // 如果原状态是状态 3，并且字符不是’；’或数字，则直接继续进行case=4的处理
			/*
			状态4是处理转义字符序列的最后一步。根据前面几个状态的处理我们已经获得了转义字符序列的前几部分，
			现在根据参数字符串中最后一个字符（命令）来执行相关的操作。
			*/
			case 4:
				state=0;  // 首先复位状态 state=0。
				switch(c) {
					case 'G': case '`': 		// CSI Pn G - 光标水平移动到指定列（列号从1开始编号，x从0开始）
						if (par[0]) par[0]--;
						gotoxy(par[0],y);
						break;
					case 'A':
						if (!par[0]) par[0]++;
						gotoxy(x,y-par[0]);		// 同列上移动Pn行
						break;
					case 'B': case 'e':
						if (!par[0]) par[0]++;
						gotoxy(x,y+par[0]);
						break;
					case 'C': case 'a':
						if (!par[0]) par[0]++;
						gotoxy(x+par[0],y);
						break;
					case 'D':
						if (!par[0]) par[0]++;
						gotoxy(x-par[0],y);
						break;
					case 'E':
						if (!par[0]) par[0]++;
						gotoxy(0,y+par[0]);
						break;
					case 'F':
						if (!par[0]) par[0]++;
						gotoxy(0,y-par[0]);
						break;
					case 'd':
						if (par[0]) par[0]--;
						gotoxy(x,par[0]);
						break;
					case 'H': case 'f':
						if (par[0]) par[0]--;
						if (par[1]) par[1]--;
						gotoxy(par[1],par[0]);
						break;
					case 'J':
						csi_J(par[0]);
						break;
					case 'K':
						csi_K(par[0]);
						break;
					case 'L':
						csi_L(par[0]);
						break;
					case 'M':
						csi_M(par[0]);
						break;
					case 'P':
						csi_P(par[0]);
						break;
					case '@':
						csi_at(par[0]);
						break;
					case 'm':
						csi_m();
						break;
					case 'r':
						if (par[0]) par[0]--;
						if (!par[1]) par[1] = video_num_lines;
						if (par[0] < par[1] &&
						    par[1] <= video_num_lines) {
							top=par[0];
							bottom=par[1];
						}
						break;
					case 's':
						save_cur();
						break;
					case 'u':
						restore_cur();
						break;
				}
		}
	}
	set_cursor();
}

/*
 *  void con_init(void);
 *
 * This routine initalizes console interrupts, and does nothing
 * else. If you want the screen to clear, call tty_write with
 * the appropriate escape-sequece.
 *
 * Reads the information preserved by setup.s to determine the current display
 * type and sets everything accordingly.
 */
void con_init(void)
{
	register unsigned char a;
	char *display_desc = "????";
	char *display_ptr;

	video_num_columns = ORIG_VIDEO_COLS;
	video_size_row = video_num_columns * 2;  // 屏幕上1个字符在显存中用 2 字节表示
	video_num_lines = ORIG_VIDEO_LINES;
	video_page = ORIG_VIDEO_PAGE;
	video_erase_char = 0x0720; /* 空格字符 */
	
	if (ORIG_VIDEO_MODE == 7)			/* Is this a monochrome display? 单色显示 */
	{
		video_mem_start = 0xb0000;
		video_port_reg = 0x3b4;
		video_port_val = 0x3b5;
		if ((ORIG_VIDEO_EGA_BX & 0xff) != 0x10)
		{
			video_type = VIDEO_TYPE_EGAM;
			video_mem_end = 0xb8000;
			display_desc = "EGAm";
		}
		else
		{
			video_type = VIDEO_TYPE_MDA;
			video_mem_end	= 0xb2000;
			display_desc = "*MDA";
		}
	}
	else								/* If not, it is color. */
	{
		video_mem_start = 0xb8000;
		video_port_reg	= 0x3d4;
		video_port_val	= 0x3d5;
		if ((ORIG_VIDEO_EGA_BX & 0xff) != 0x10)
		{
			video_type = VIDEO_TYPE_EGAC;
			video_mem_end = 0xbc000;
			display_desc = "EGAc";
		}
		else
		{
			video_type = VIDEO_TYPE_CGA;
			video_mem_end = 0xba000;
			display_desc = "*CGA";
		}
	}

	/* Let the user known what kind of display driver we are using */
	
	display_ptr = ((char *)video_mem_start) + video_size_row - 8;
	while (*display_desc)
	{
		*display_ptr++ = *display_desc++;
		display_ptr++;
	}
	
	/* Initialize the variables used for scrolling (mostly EGA/VGA)	*/
	
	origin	= video_mem_start;
	scr_end	= video_mem_start + video_num_lines * video_size_row;
	top	= 0;
	bottom	= video_num_lines;

	gotoxy(ORIG_X,ORIG_Y);
	set_trap_gate(0x21,&keyboard_interrupt);
	outb_p(inb_p(0x21)&0xfd,0x21);
	a=inb_p(0x61);
	outb_p(a|0x80,0x61);
	outb(a,0x61);
}
/* from bsd-net-2: */

void sysbeepstop(void)
{
	/* disable counter 2 */
	outb(inb_p(0x61)&0xFC, 0x61);
}

int beepcount = 0;

static void sysbeep(void)
{
	/* enable counter 2 */
	outb_p(inb_p(0x61)|3, 0x61);
	/* set command for counter 2, 2 byte write */
	outb_p(0xB6, 0x43);
	/* send 0x637 for 750 HZ */
	outb_p(0x37, 0x42);
	outb(0x06, 0x42);
	/* 1/8 second */
	beepcount = HZ/8;	
}
